home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Game / C / CORE! 1.1.CPT / Core! 1.1 / Battle Programs / contest90 / C10N642.RED < prev    next >
Encoding:
Text File  |  1991-08-13  |  2.7 KB  |  74 lines
  1. ;
  2. ;    Warrior: C10n642
  3. ;  File name: c10n642.red
  4. ; Tournament: ICWST'90
  5. ;   Standard: CWS'88
  6. ;     Author: John R. Perry
  7. ;
  8.          DAT       < 00568      < 01AC4
  9.          JMP       $ 0FFFE      $ 0F10A
  10.          JMP       $ 0FFFC      < 0F7AE
  11.          JMP       $ 0FFFC      < 0F7AE
  12.          CMP       @ 0FFE1      $ 0FFE3
  13.          MOV       @ 0FFFD      @ 0FFF7
  14.          CMP       @ 00011      @ 0000D
  15. start    JMZ       $ 00003      $ 00004
  16.          MOV       @ 0FFFF      < 0FFF0
  17.          MOV       @ 0FFFD      @ 0FFF7
  18.          MOV       < 0FFFD      < 0FFF7
  19.          MOV       @ 0FFFF      < 0FFF0
  20.          DJN       $ 0FFFF      $ 0FFFC
  21.          CMP       @ 0FFF8      @ 0FFFD
  22.          MOV       @ 0FFFF      < 0FFF0
  23.          DJN       $ 0FFFF      $ 0FFFC
  24.          ADD       $ 00002      < 000CE
  25.          MOV       $ 00001      < 01189
  26.          JMP       $ 0FFFC      < 0F7AE
  27.          SUB       $ 00002      @ 00002
  28.          JMZ       $ 00006      # 00007
  29.          JMP       $ 00001      < 0195E
  30.          JMP       $ 0FFFC      < 0F7AE
  31.          JMN       $ 0FFFA      # 0FFFE
  32.          JMZ       $ 0FFFE      @ 0FFFB
  33.          JMP       $ 0FFFE      $ 0F10A
  34.          SUB       < 0FFFD      < 0FFF0
  35.          CMP       @ 00011      @ 0000D
  36.          DJN       $ 0FFFF      $ 0FFFC
  37.          JMP       $ 0FFFE      $ 0F48C
  38.          ADD       # 00005      < 00000
  39.          SUB       # 00001      < 00000
  40.          CMP       $ 00022      $ 00021
  41.          DAT       @ 0EEED      $ 0EE23
  42.          DJN       < 00001      $ 00005
  43.          DAT       @ 01942      @ 011BE
  44.          SUB       # 0FFFC      $ 0F5E4
  45.          ADD       $ 00002      < 00000
  46.          JMZ       < 0FFF9      $ 0FFFA
  47.          ADD       # 00005      < 00000
  48.          DJN       $ 0FFFF      $ 0FFFC
  49.          JMP       $ 0FFFC      < 0F7AE
  50.          DAT       @ 0F143      $ 0EC96
  51.          DAT       @ 01DED      @ 00A10
  52.          SUB       # 0FFFB      < 0FFF7
  53.          SPL       $ 00000      < 00314
  54.          JMP       $ 0FFFC      < 0F7AE
  55.          CMP       < 00003      < 00016
  56.          SPL       < 00006      $ 00483
  57.          MOV       @ 0FFFD      @ 0FFF7
  58.          MOV       @ 0FFFF      < 0FFF0
  59.          DJN       $ 0FFFF      $ 0FFFC
  60.          DJN       < 00004      @ 00003
  61.          JMZ       $ 00006      # 00007
  62.          SUB       # 00002      < 0000E
  63.          ADD       $ 00001      @ 01AC4
  64.          JMP       < 00003      @ 00958
  65.          DJN       < 0FFF9      $ 0FFFE
  66.          DAT       < 00013      @ 00007
  67.          ADD       # 0FFFC      < 0EF7A
  68.          DAT       < 011E3      < 01A1B
  69.          CMP       @ 0FFF8      @ 0FFFD
  70.          DAT       $ 0FFD5      < 0FFE9
  71.          CMP       # 00010      # 00008
  72.          CMP       @ 00011      @ 0000D
  73.          END         start
  74. P